Top 10k strings from Coursemaster v3.88 (1991)(Intraset)(Side A).dsk
in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [DSK] /
Back to the directory listing
30 t(x)<t(x+1 30 Track-Info 16 "_______________________________" 14 "______________________________" 10 "PRESS M FOR MENU" 8 ;"CALCULATE ANOTHER Y/N ?" 8 "YOU HAVE ";W;" WINNERS" 6 T(X)=T(X)+2 6 T(X)=T(X)+0 6 ;"MULTIPLE BETTING": 6 ;"CURRENT ACCOUNT TRANSACTION" 4 V=(V+J(X)-Y(X)) 4 T(X)=T(X)+6 4 T(X)=T(X)+4 4 T(X)=T(X)+10 4 T(X)=T(X)+0.1 4 C=S+(S*O(3 4 BC=B+(B*O(3 4 B=S+(S*O(2 4 AC=A+(A*O(3 4 ABC=AB+(AB*O(3 4 AB=A+(A*O(2 4 A=S+(S*O(1 4 ;"_______________________________" 4 ;"RETURN"; 4 ;"IS THIS CORRECT Y/N ?" 4 ;"HORSE No."; 4 ;"EACH WAY SINGLE" 4 ;"COURSEMASTER BET" 4 ;"COURSE/TIME" 4 ;"6) MAIN MENU" 4 ;"3) FETCH A STORED RACE" 4 "WHAT ODDS DID YOUR BET RUN AT ie 7/4 ?";o 4 "THE FORECAST IS....." 4 "HOW MUCH DID YOU BET (EXCLUDING TAX ? `";S 4 "3RD CHOICE....";N$(3 4 "2ND CHOICE....";N$(2 2 t(x)=t(x+1 2 t(x)=(t(x)-(o(x)/5 2 o(x)=o(x+1 2 n$(x)=n$(x+1 2 h$(x)=n$(x) 2 h$(x)=C$(x) 2 h$(x)=B$(x) 2 h$(x)=A$(x) 2 Y(X)=V(X+100 2 X;")";N$(X) 2 WWWWWW=WWWWW+(AF+BF+CF+DF+EF+ABF+ACF+ADF+AEF+BCF+BDF+BEF+DCF+CEF+EDF+ABCF+ACDF+ABDF+ABEF+ADEF+ACEF+BCDF+BCEF+BDEF+DCEF+ABCDF+ABCEF+ABDEF+ACDEF+BCDEF+ABCDEF) 2 WWWWW=WWWW+(AE+BE+CE+ED+ABE+ACE+ADE+BCE+BDE+DCE+ABDE+ABCE+ACDE+BCDE+ABCDE) 2 WWWW=WWW+(AD+BD+DC+ABD+ACD+BCD+ABCD) 2 WWWW=A+B+C+AB+AC+BC+ABC 2 WWW=WW+(AC+BC+ABC) 2 WWW=A+B+AB 2 WHEN SERVICE ACTIVE INSERT GOTO LINE HERE ***** 2 W$=M$(X+101 2 TIPPING SERVICE***** 2 T(X)=T(X)+6.2 2 T(X)=T(X)+4.2 2 R=(A+(A*O(2 2 PRINT OUT SLIP***** 2 N$(X);"LOOKS AN EXCEPTIONALLY GOOD LONG SHOT" 2 N$(X);"LOOKS AN EXCEPTIONALLY GOOD EACH WAY BET" 2 N$(X);"LOOKS A GOOD LONG SHOT" 2 N$(X);"LOOKS A GOOD EACH WAY BET" 2 N$(X);"'S PREVIOUS RACE" 2 N$(X);"'S LAST RACE " 2 LOAD RACE DISC***** 2 J(X)=V(X+200 2 F=S+(S*O(6 2 EF=E+(E*O(6 2 EDF=ED+(ED*O(6 2 ED=D+(D*O(5 2 E=S+(S*O(5 2 DISK BAK 2 DISK 2 DF=D+(D*O(6 2 DCF=DC+(DC*O(6 2 DCEF=DCE+(DCE*O(6 2 DCE=DC+(DC*O(5 2 DC=C+(C*O(4 2 D=S+(S*O(4 2 D=C+(C*(O(2 2 D$(X)=M$(X+100 2 CF=C+(C*O(6 2 CEF=CE+(CE*O(6 2 CE=C+(C*O(5 2 C$(x)=C$(x+1 2 C$(X)=N$(X+100 2 C$(X)="CD" 2 BF=B+(B*O(6 2 BEF=BE+(BE*O(6 2 BDF=BD+(BD*O(6 2 BDEF=BDE+(BDE*O(6 2 BDE=BD+(BD*O(5 2 BD=B+(B*O(4 2 BCF=BC+(BC*O(6 2 BCEF=BCE+(BCE*O(6 2 BCE=BC+(BC*O(5 2 BCDF=BCD+(BCD*O(6 2 BCDEF=BCDE+(BCDE*O(6 2 BCDE=BCD+(BCD*O(5 2 B=A+(A*O(2 2 B$(x)=B$(x+1 2 B$(X)=N$(X+70 2 ALTER RUNNERS***** 2 AF=A+(A*O(6 2 AEF=AE+(AE*O(6 2 AE=A+(A*O(5 2 ADF=AD+(AD*O(6 2 ADEF=ADE+(ADE*O(6 2 ADE=AD+(AD*O(5 2 AD=A+(A*O(4 2 ACF=AC+(AC*O(6 2 ACEF=ACE+(ACE*O(6 2 ACE=AC+(AC*O(5 2 ACDF=ACD+(ACD*O(6 2 ACDEF=ACDE+(ACDE*O(6 2 ACDE=ACD+(ACD*O(5 2 ACD=AC+(AC*O(4 2 ABF=AB+(AB*O(6 2 ABEF=ABE+(ABE*O(6 2 ABE=AB+(AB*O(5 2 ABDF=ABD+(ABD*O(6 2 ABDEF=ABDE+(ABDE*O(6 2 ABDE=ABD+(ABD*O(5 2 ABD=AB+(AB*O(4 2 ABCF=ABC+(ABC*O(6 2 ABCEF=ABCE+(ABCE*O(6 2 ABCE=ABC+(ABC*O(5 2 ABCDF=ABCD+(ABCD*O(6 2 ABCDEF=ABCDE+(ABCDE*O(6 2 ABCDE=ABCD+(ABCD*O(5 2 ABCD=ABC+(ABC*O(4 2 A=(S+(S*O(1 2 A$(x)=A$(x+1 2 A$(X)=N$(X+40 2 ;B$(X);".";A$(X);".";C$(X);"."; 2 ;B$(P);".";A$(P);".";C$(P);"." 2 ;"______________________" 2 ;"___________" 2 ;"________"; 2 ;"WIN DOUBLE" 2 ;"WARNING" 2 ;"TIED RESULT" 2 ;"THE COURSEMASTER BETTING SYSTEM" 2 ;"SINGLE/EACH WAY SINGLE" 2 ;"SINGLE WIN BET" 2 ;"SAVING DATA" 2 ;"SAVING CURRENT RACE": 2 ;"SAVE ACCOUNT" 2 ;"RUNNERS ";N 2 ;"RACE PREDICTION" 2 ;"RACE MENU" 2 ;"RACE ASSESSMENT" 2 ;"RACE ";T$(1 2 ;"PRINT OUT BETTING SLIP" 2 ;"PRESS'W'FOR WIN" 2 ;"PRESS'T' TO MAKE TRANSACTION" 2 ;"PRESS'M'FOR MENU" 2 ;"PRESS'E'FOR EACH WAY" 2 ;"PRESS U TO UPDATE ACCOUNT" 2 ;"PRESS C TO CORRECT " 2 ;"PRESS ANY KEY TO CONTINUE" 2 ;"PRESS A TO ABANDON" 2 ;"PRESS 'S' TO SAVE CURRNT ACC" 2 ;"PRESS 'S' FOR SINGLE" 2 ;"PRESS 'O' TO INPUT ODDS" 2 ;"PRESS 'M' FOR MENU" 2 ;"PRESS 'E' FOR EACH WAY" 2 ;"PRESS 'C' TO CREATE NEW ACCOUNT" 2 ;"PRELIMINARY ASSESSMENT" 2 ;"PREDICTING WINNER" 2 ;"PLEASE WAIT" 2 ;"PLEASE SELECT 1-6" 2 ;"PATENT": 2 ;"PAGE FULL" 2 ;"NO RESULT" 2 ;"NO FORM ";U 2 ;"NAME/BET"; 2 ;"NAME OR No."; 2 ;"MAIN MENU" 2 ;"LOAD WHICH ACCOUNT...?" 2 ;"JOIN OUR TIPPING SERVICE" 2 ;"IS THIS CORRECT ? Y/N " 2 ;"INPUT THE ODDS" 2 ;"INPUT ODDS ? Y/N" 2 ;"IMPORTANT" 2 ;"ENTER RACE DETAILS" 2 ;"ENTER ODDS" 2 ;"EACH WAY DOUBLE" 2 ;"DOUBLE/EACH WAY DOUBLE" 2 ;"CURRENT ACCOUNT" 2 ;"COURSEMASTER BET": 2 ;"COPYRIGHT 2 ;"CHECK DETAILS CORRECT" 2 ;"CALCULATE ANOTHER ? Y/N" 2 ;"CALCULATE ANOTHER ? Y/N " 2 ;"BY INTRASET LTD" 2 ;"BETTING BANK" 2 ;"BETS MENU" 2 ;"ASSESSING ";R; 2 ;"AS..";T$(1 2 ;"ALTER RACE DATA" 2 ;"ALTER ODDS": 2 ;"ALTER DATA" 2 ;"ALL RIGHTS RESERVED" 2 ;"6) DISPLAY CURRENT SELECTIONS" 2 ;"6) BETS INDEX" 2 ;"5) SAVE SELECTIONS TO DISC" 2 ;"5) PREDICT CURRENT RACE" 2 ;"5) MAIN MENU" 2 ;"5) COURSEMASTER SYSTEM BET" 2 ;"5) CALCULATE WINNINGS" 2 ;"4) YANKEES CANADIANS HEINZ" 2 ;"4) RETURN TO MENU" 2 ;"4) RETURN TO MAIN MENU" 2 ;"4) MAIN MENU" 2 ;"4) FETCH A STORED ACCOUNT" 2 ;"4) DISPLAY CURRENT RACE" 2 ;"4) BETTING BANK ACCOUNTS" 2 ;"3) SAVE THIS RACE" 2 ;"3) RETURN TO BETS MENU" 2 ;"3) PATENT" 2 ;"3) MAIN MENU" 2 ;"3) CREATE A NEW ACCOUNT" 2 ;"3) BETS MENU" 2 ;"2) SAVE CURRENT RACE " 2 ;"2) SAVE ACCOUNT TO DISC" 2 ;"2) MAKE A COURSEMASTER BET" 2 ;"2) INPUT ODDS" 2 ;"2) INPUT NEW SELECTIONS" 2 ;"2) DOUBLE/EACH WAY DOUBLE" 2 ;"2) DISPLAY CURRENT RACE" 2 ;"2) DEPOSITS OR WITHDRAWALS" 2 ;"1) SINGLE/EACH WAY SINGLE" 2 ;"1) SEE STATEMENT" 2 ;"1) SEE AN EXAMPLE" 2 ;"1) PREDICT CURRENT RACE" 2 ;"1) FETCH FROM DISC" 2 ;"1) EXAMINE CURRENT ACCOUNT" 2 ;"1) ENTER NEW RACE DETAILS" 2 ;"1) ASSESS A NEW RACE" 2 ;"*** COURSEMASTER ***" 2 ;"(Ver 3,88)" 2 ;" PRESS 'C' TO CONTINUE" 2 +X)=C$(X): 2 **PRELIM ASSESS** 2 **NEW ACCOUNT** 2 **LIST SELS*** 2 **FETCH ACCOUNT** 2 **CURRENT ACCOUNT** 2 **ALTER INDIVIDUAL HORSES*** 2 ***odds weighting*** 2 ***dummy values**** 2 ***display forecast*** 2 ***TITLE COPYRIGHT*** 2 ***SAVE RACE DATA**** 2 ***PERMUTATION BETTING** 2 ***PERM BET INPUT*** 2 ***PATENT**** 2 ***MAKE A PERM BET*** 2 ***MAIN MENU*** 2 ***INPUT RUNNERS*** 2 ***INPUT RACE DATA**** 2 ***INPUT ODDS**** 2 ***EXAMPLE*** 2 ***DEPS WITHDS*** 2 ***CURRENT ACCOUNT*** 2 ***CALCULATE WINNINGS**** 2 ***5 TIMERS**** 2 ****create a new account**** 2 ****ODDS/STORE**** 2 ****MULTIPLE BETTING**** 2 ****DOUBLES**** 2 ****BANK ACCOUNT***** 2 *****BETTING INDEX***** 2 *** RACE PREDICTION*** 2 *** RACE MENU**** 2 *** 4TIMERS*** 2 *** 19TREBLES*** 2 );"HAS A MAX RATING- BET!" 2 );"COULD BE A THREAT" 2 );"-SINGLE WIN BET" 2 );"-EACH WAY SINGLE BET" 2 );" AND ";N$(2 2 )*O)+((S/2 2 "lottery,I would recommend NO BET": 2 "for me to assess accurately" 2 "_________________________________" 2 "________________________________" 2 "_______:=ACCUMULATORS." 2 "You are taking a chance leaving so many runners out of asessment": 2 "YOUR STATEMENT PAGE IS FULL" 2 "YOUR RETURN ON THIS BET IS `";R 2 "YOUR INITIAL UNIT STAKE WAS `";S 2 "YOUR CURRENT BALANCE IS `";V 2 "YOU HAVE ";W;" WINNERS": 2 "YOU ARE ASSESSING.....";R 2 "WHISKAS WONDER WETH 2.30" 2 "WHAT WAS YOUR UNIT STAKE Ie.50p Patent = `0.50 ? `";s 2 "WHAT WAS YOUR RETURN ? `";J(M) 2 "WHAT PLACE ODDS ON YOUR SECOND HORSE ?";Z(2 2 "WHAT PLACE ODDS DID YOU GET ON THIS HORSE 1/4 OR 1/5 ?";Z(1 2 "WHAT PLACE ODDS DID YOU GET Ie.1/4 or 1/5 ?";z 2 "WHAT ODDS FOR WINNER No.";X;" ?" 2 "WHAT ODDS FOR WINNER No.";X 2 "WHAT ODDS DID YOUR SECOND HORSE WIN AT ?";O(2 2 "WHAT ODDS DID YOUR SECOND HORSE RUN AT ? ";O(2 2 "WHAT ODDS DID YOUR FIRST HORSE WIN AT ?";O(1 2 "WHAT ODDS DID YOUR FIRST HORSE RUN AT ?";O(1 2 "WHAT A WALLY NEWC 2.30" 2 "UNEXPOSED FORM OR HAVE NOT RUN " 2 "This would seem at first sight an excellent race and at this stage I strongly recommend a bet" 2 "This is the charge of The Light Brigade not a horse race! If you bet in this you have moremoney than sense! NO BET": 2 "This field is very small.Only bet if the favourite is odds on AND won it's last race.": 2 "This field is something of a " 2 "This field is of an ideal size" 2 "There are too many without form here. NO BET": 2 "There are a few without form here which means that they can- not be allowed for in my calculations": 2 "TINNED PEACH WETH 1.30" 2 "THIS SEASON ? " 2 "THIS FORECAST HAS BEEN MADE WITH-OUT KNOWING THE ODDS. TO INPUTTHE ODDS PRESS O" 2 "THER IS A TIE BETWEEN": 2 "THE TOP 2 ARE VERY CLOSE ";N$(2 2 "THE ODDS WHERE...";O(X) 2 "THE ODDS ARE....";O(X) 2 "THE ODDS ARE ...";O(X) 2 "TAX :=10x4 HORSE 10p WIN" 2 "SUITABLE BET- REVERSE F'CAST" 2 "SUITABLE BET - TRICAST" 2 "STAKE :PERM ANY 2 PAIRS FROM 5" 2 "SAVING ACCOUNT AS.. ";W$ 2 "SAVE BET AS ....? ";Q$ 2 "RACECOURSE AND TIME..";T$(N) 2 "RACE TITLE ? ";Z$: 2 "RACE TITLE ..........";T$(1 2 "RACE PREDICTION" 2 "PRINT OUT ANOTHER IN" 2 "PREVIOUS RACE RESULT ";B$(X) 2 "PRESS S TO SAVE TO TAPE" 2 "PRESS S TO SAVE THIS PAGE AND CONTINUE" 2 "PRESS P TO PRINT": 2 "PRESS P TO PRINT OUT SLIP" 2 "PRESS P TO PRINT " 2 "PRESS P TO INPUT DETAILS" 2 "PRESS C,D,B(BOTH) OR 0 FOR NONE" 2 "PRESS C TO ALTER" 2 "PRESS ANY KEY TO RETURN TO MENU" 2 "PRESS 'P' TO PRINT" 2 "PRESS 'P' TO PRINT 'M' FOR MENU" 2 "PRESS 'O' TO ALTER ODDS" 2 "PRESS 'M' FOR MENU" 2 "PRESS 'A' TO ALTER RUNNERS" 2 "POWDER BLUE DONC 1.00" 2 "PLEASE ENTER TITLE OF RACE Ie Don2.30" 2 "PLEASE ENTER THE RESULT OF " 2 "PLEASE ENTER ODDS FOR ";N$(X) 2 "PLEASE ENTER NEW ODDS..";O(X) 2 "PLEASE ENTER NAME,RACECOURSE" 2 "ONLY ENTER ODDS IF YOU HAVE ODDSFOR ALL THE RUNNERS YOU ARE RATING" 2 "OLD NAG NEWC 1.00" 2 "No.WITHOUT FORM.......";U 2 "No.OF RUNNERS.........";N 2 "NUMBER WITHOUT FORM ?.. ";U 2 "NEW NAME ? ";N$(X) 2 "NEW COURSE AND TIME ? ";T$(X) 2 "NAME...";N$(N) 2 "NAME OR BET TYPE";M$(M) 2 "NAME OF RACE...";Z$ 2 "NAME OF ACCOUNT ? ";W$ 2 "NAME OF ACCOUNT ..";W$ 2 "MY INITIAL THOUGHTS ARE :-": 2 "MOTHER HEN NEWC 2.00" 2 "MAKE A COPY ?" 2 "LOAD BET NAMED...?";Q$ 2 "LAST RACE RESULT ";A$(X) 2 "IT IS NOT POSSIBLE TO PREDICT A CLEAR WINNER. THERE IS A TIE. PLEASE INPUT SOME ODDS FOR ME IN ORDER THAT I CAN ASSESS IT MORE ACCURATELY" 2 "IS THE ABOVE CORRECT ? Y/N" 2 "IS ";N$(X);" C,D OR C+D ?" 2 "INPUT NEW DETAILS...." 2 "INCORRECT NUMBER": 2 "INCORRECT NUMBER ": 2 "I WISH TO ASSESS ..";R 2 "I CAN'T SEPARATE THESE TWO": 2 "HOW MUCH WAS YOUR UNIT STAKE? Ie. 10p YANKEE = `0.10. `";S 2 "HOW MUCH DIDYOU BET (EXCLUDING TAX)? `";S 2 "HOW MUCH DID YOU STAKE ? `";Y(M) 2 "HOW MUCH DID YOU BET (EXCLUDING TAX) ? `";S 2 "HOW MANY WINNERS IN YOUR BET? Enter 2-6 ";w 2 "HOW MANY WINNERS DID YOU HAVE ?";W 2 "HOW MANY RUNNERS IN RACE ? ";N 2 "HOW MANY OF THESE HAVE" 2 "HOW MANY OF THE ";N;" RUNNERS" 2 "HORSE No.";n 2 "FORGET IT!": 2 "FETCHING ACCOUNT ..";W$ 2 "Enter horses name..";n$(x) 2 "Enter 0 for all others" 2 "ENTER 1=1st to 4=4th.F,U,P or B" 2 "DIFFERENT ORDER ? Y/N" 2 "DID BOTH HORSES WIN Y/N" 2 "DATE Ie.10/10/87";D$(M) 2 "CREATE A NEW ACCOUNT OPTION WILLERASE CURRENT ACCOUNT. SAVE CURRENT ACCOUNT DATA BEFORESELECTING NEW ACCOUNT OPTION" 2 "COURSE,DISTANCE WINNER ?" 2 "CHOOSE FROM....": 2 "CHOOSE FROM...": 2 "BLUE TURTLE DONC 1.30" 2 "BLUE SKY DONC 3.30" 2 "BIRCH TREE WETH 1.00" 2 "BELLY FLOP DONC 3.00" 2 "All the runners have exposed formwhich is good.": 2 "ARE THE ABOVE CORRECT ? Y/N" 2 "AND TIME Ie.FFLOYD DONC 2.30" 2 "ALTERING HORSE NUMBER ";X 2 "ALTER WHICH ONE..?";X 2 "ALTER WHICH ONE ?";X 2 "ALTER WHICH NUMBER..?";X 2 "1ST CHOICE....";N$(1 2 "1ST CHOICE...."; 2 " _________ ___________" 2 " SELECTION COURSE/TIME" 2 " PRESS M FOR MENU" 2 " PRESS A TO MAKE AN ENTRY" 2 " P TO PRINT OUT STATEMENT" 2 *** LIST TO PRINTER*** 1 s123456789:;<=>? 1 eld is rather large for an accurate assessment" 1 R=Track-Info 1 EXTENDED CPC DSK File 1 E CORRECT ? " 1 DTrack-Info 1 CPDRead v3.24 1 CLEAN FORMATTED DISC INTO THE DRIVE AND PRESS ANY KEY.FROM NOW ON LOADER WILL RUN COURSEMASTER" 1 BE=Track-Info 1 BE=B+(B*O(5 1 BCD=BC+(BC*O(Track-Info 1 BCD=BC+(BC*O(4 1 ;Track-Info 1 "This field is rather large for an accurate assessment" 1 "This fiTrack-Info 1 "NOW MAKE A COPY TO DISC. PLEASE PUT A Track-Info 1 "NOW MAKE A COPY TO DISC. PLEASE PUT A CLEAN FORMATTED DISC INTO THE DRIVE AND PRESS ANY KEY.FROM NOW ON LOADER WILL RUN COURSEMASTER" 1 "DO YOU WISH TO ASSETrack-Info 1 "DO YOU WISH TO ASSESS" 1 "DID YOUR BET WIN OR WAS IT Track-Info 1 "DID YOUR BET WIN OR WAS IT PLACED? W OR P" 1 "ARE THE ABOVTrack-Info 1 "ARE THE ABOVE CORRECT ? " 1 !"#$%&'()*+,-./0 1 PLACED? W OR P"